home *** CD-ROM | disk | FTP | other *** search
/ Programming Languages Suite / ProgramD2.iso / Visual Database / Visual dBase v5.5 / EXTERN.PAK / DBFILE.PRG < prev    next >
Encoding:
Text File  |  1995-07-18  |  2.5 KB  |  78 lines
  1. *******************************************************************************
  2. *
  3. *  PROGRAM:      dbfile.prg
  4. *
  5. *  WRITTEN BY:   Borland Samples Group.
  6. *
  7. *  DATE:         1/94
  8. *
  9. *  UPDATED:      5/95
  10. *
  11. *  REVISION:     $Revision:   2.11  $
  12. *
  13. *  VERSION:      Visual dBASE
  14. *
  15. *  DESCRIPTION:  Part of the dbfile example.
  16. *                See the file dbfile.cpp for a complete description.
  17. *                The dbgrep.prg and dbsysdrv.prg programs show how the
  18. *                dbfile system can be used.
  19. *
  20. *  PARAMETERS:   None
  21. *
  22. *  CALLS:        To dbfile.dll
  23. *
  24. *  USAGE:        This program is not meant to be run stand alone, but by
  25. *                adding the following 2 lines in a program you get full
  26. *                access to the textfile class:
  27. *
  28. *                SET PROC to dbfile ADDITIVE
  29. *                DO dbfile
  30. *
  31. *******************************************************************************
  32.  
  33. * Be quiet.
  34. SET talk off
  35.  
  36. *
  37. *  Definition of the textfile class.  Usage of this class requires
  38. *  dbfile.dll to be on your search path.
  39. *
  40.  
  41. * TFinit is called once to set up the class.
  42. EXTERN CLONG TFinit()                          dbfile.dll
  43.  
  44. * These are  the functions that are available.
  45. EXTERN CLOGICAL TFclose()                      dbfile.dll
  46. EXTERN CLOGICAL TFeof()                        dbfile.dll
  47. EXTERN CLOGICAL TFerror()                      dbfile.dll
  48. EXTERN CLOGICAL TFfieldseparator( CSTRING )    dbfile.dll
  49. EXTERN CLOGICAL TFfilter( CSTRING )            dbfile.dll
  50. EXTERN CSTRING  TFgeterror()                   dbfile.dll
  51. EXTERN CSTRING  TFgetfield( CWORD )            dbfile.dll
  52. EXTERN CSTRING  TFgetline()                    dbfile.dll
  53. EXTERN CLOGICAL TFlineseparator( CSTRING )     dbfile.dll
  54. EXTERN CLOGICAL TFopen( CSTRING )              dbfile.dll
  55. EXTERN CVOID    TFrelease()                    dbfile.dll
  56. EXTERN CWORD    TFgetrec()                     dbfile.dll
  57.  
  58. CLASS textfile
  59.  
  60.    * Call the DLL to set up all the details.
  61.    this.mystruct       = TFinit()
  62.  
  63.    * Initialize the memberfunctions.
  64.    this.close          = TFclose
  65.    this.eof            = TFeof
  66.    this.error          = TFerror
  67.    this.fieldseparator = TFfieldseparator
  68.    this.filter         = TFfilter
  69.    this.geterror       = TFgeterror
  70.    this.getfield       = TFgetfield
  71.    this.getline        = TFgetline
  72.    this.lineseparator  = TFlineseparator
  73.    this.open           = TFopen
  74.    this.release        = TFrelease
  75.    this.getrec         = TFgetrec
  76.  
  77. ENDCLASS
  78.